↔:SELF
XUNAME/
:KILL
:IF E ≠Q-≠1'RWK≠
≠(⊗
:COPY nilsrc;[lrec] update,nilsrc;nillrc >
:@ nilsrc;nillrc >/g/l[lisp]/o[nilsrc;nilsrc @XGP]/1u/a/3f/n/s/64v/110w/x/3f[25fg1,25fg1,25fg]/q, NILSRC; codegn,deftyp,eval,sim,intern,macros,ncboot,nilc,   mapfx,nilfun,nilio,nilsys,nlboot,null,reader,setup,seq,drammp,vaxcod,comp
:COPY dsk:nilsrc;nillrc lrec,nilsrc;[lrec] update

:COPY nilcom;[lrec] update,nilcom;nillrc >
:@ nilcom;nillrc >/g/l[lisp]/o[nilcom;nilcom @XGP]/1u/a/3f/n/s/64v/110w/x/3f[25fg1,25fg1,25fg]/q, NILCOM; sharpm,vsaid,defmac,defmax,defvst,setf,defset,backq,evonce,let,lodbyt, macaid,nilaid,string
:COPY dsk:nilcom;nillrc lrec,nilcom;[lrec] update

:COPY dsk:nilsrc;[mrec] update,nilmrc >
:@ nilsrc;nilmrc >/g,/o[nilsrc;nilmid @XGP]/a/#/n/s/64v/110w/x/3f[25fg1,25fg1,25fg]/q/1u/L[MIDAS]    NILSRC; uapply,vbind
:copy dsk:nilsrc;nilmrc lrec,[mrec] update

:COPY nil;[lrec] update,nil;nillrc >
:@ nil;nillrc >/g/l[random]/o[nil;nildoc @XGP]/a/#/3f/n/s/64v/110w/x/3f[25fg1,25fg1,25fg1]/q, NIL; asmmac,ccenv,chprop,funcal,gbs'',newfun,nil,prog4v,rp,shape, slink,vasfmt,vmach
:COPY dsk:nil;nillrc lrec,nil;[lrec] update

:COPY vasdoc;[lrec] update,vasdoc;vasdoc >
:@ vasdoc;vasdoc >/g/l[random]/o[vasdoc;vasdoc @XGP]/a/#/3f/n/s/64v/110w/x/3f[25fg1,25fg1,25fg1]/q, VASDOC; ALLOCP,ARGDEC,BIND,CARCDR,CARCDR,CASE,CONS,DIRT,  DIRTMA,ERROR,ERRORM,INHIB,IRPLIS,LISPMA,LISPOP,MACDEF,MINIAR,MISCMA,PKGDEF,    PSECT,SELECT,SLINK,STACK,STRUCT,SYMS,VASL
:COPY dsk:vasdoc;vasdoc lrec,vasdoc;[lrec] update


:COPY nilvax;[lrec] update,nilvax;nilvax >
:@ nilvax;nilvax >/g/l[random]/o[nilvax;nilvax @XGP]/a/#/3f/n/s/64v/110w/x/3f[25fg1,25fg1,25fg1]/q, NILVAX; ARGDEC,BIND,CARCDR,CARCDR,CASE,CONS,CONSTA,DIRT,  DIRTMA,ERROR,ERRORM,HDRTST,INTMAC,IRPLIS,LCALL,LISP,LISPMA,LISPOP,LISPOP,      MACDEF,MINIAR,MISCMA,MOVSLI,PKGDEF,POSQ,PSECT,PSECTE,SELECT,SLINK,SPECPD,STACK,STRUCT,SYMBOL,SYMDEF,SYMS,TCASE,TEST,TIO,TOP,TRAMPO,VASDEF,VASFIL,VASHDR,      VASLIB,VASREL,VASSUB,VAXMAX,XFORME
:COPY dsk:nilvax;nilvax lrec,nilvax;[lrec] update
↔≠)
:ELSE
≠(⊗
:@ NIL;NILLRC >/G
:@ NILSRC;NILLRC >/G
:@ NILSRC;NILMRC >/G
:@ VASDOC;VASDOC >/G
:@ NILVAX;NILVAX >/G
↔≠)

β